home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_c / cgraphix / cpie.c < prev    next >
Text File  |  1986-05-28  |  1KB  |  70 lines
  1. /* «RM120»«PL99999»«TS4,8,12,16,20,24,28,32,36,40,44,48,52,56,60,64,68,72,76» */
  2. #include    <stdio.h>
  3. #define    EXTERN    extern
  4. #include    <typedef.h>
  5.  
  6.  
  7. void OnePieDem()
  8. {
  9.     extern char    *strcpy();
  10.  
  11.     double    sum,x1,y1,Radius,Theta,InRadius,OutRadius;
  12.     int        n,Mode,Size;
  13.     PieArray    a;
  14.     int        back;
  15.     int        ch;
  16.  
  17.     ClearScreen();
  18.     SetColorWhite();
  19.  
  20.     DefineWindow(1,0,0,XMaxGlb,YMaxGlb);
  21.     DefineHeader(1,"A SINGLE PIE CHART");
  22.     DefineWorld(1, 0., 0., 1000., 1000.);
  23.     SelectWorld(1);
  24.     SelectWindow(1);
  25.     SetHeaderOn();
  26.     SetBackground(0);
  27.     DrawBorder();
  28.  
  29.     n = 5;
  30.     a[0].area = 25;
  31.     a[1].area = 17.5;
  32.     a[2].area = 9.6;
  33.     a[3].area = 21;
  34.     a[4].area = 35;
  35.     strcpy(a[0].text, "JAN.=");
  36.     strcpy(a[1].text, "FEB.=");
  37.     strcpy(a[2].text, "MAR.=");
  38.     strcpy(a[3].text, "APR.=");
  39.     strcpy(a[4].text, "MAY=");
  40.  
  41.     a[0].area = -a[0].area;
  42.  
  43.     x1 = 500.;
  44.     y1 = 500.;
  45.  
  46.     Radius = 200.;
  47.     Theta = 60.;
  48.  
  49.     SetAspect(1.0);
  50.  
  51.     InRadius = 0.7;
  52.     OutRadius = 1.25;
  53.  
  54.     Mode = 2;
  55.     Size = 2;
  56.  
  57.     DrawPolarPie(x1,y1,Radius,Theta,InRadius,OutRadius,a,n,Mode,Size);
  58. }
  59.  
  60.  
  61.  
  62. main()
  63. {
  64.     InitGraphic();
  65.     OnePieDem();
  66.     inkey();
  67.     LeaveGraphic();
  68. }
  69.  
  70.